calc-aent.el

calc-do-quick-calc: Add base 2 to the list of outputs of integers.

diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el
index e640eb5c438abbb414f275b79fa7dbfa29721549..ffd07bd8f2efc96546003f62b4efd426e44a60b9 100644 (file)
--- a/lisp/calc/calc-aent.el
+++ b/lisp/calc/calc-aent.el
@@ -74,6 +74,9 @@
                                ", "
                                (let ((calc-number-radix 8))
                                  (math-format-value (car alg-exp) 1000))
+                                ", "
+                                (let ((calc-number-radix 2))
+                                  (math-format-value (car alg-exp) 1000))
                                (if (and (integerp (car alg-exp))
                                         (> (car alg-exp) 0)
                                         (< (car alg-exp) 127))